home *** CD-ROM | disk | FTP | other *** search
/ DS-CD ROM 2 1993 August / DS CD-ROM 2.Ausgabe (August 1993).iso / programm / ds0257 / lib.exe / KEYS.MAB < prev    next >
Text File  |  1992-02-02  |  4KB  |  248 lines
  1. #IF !BASEFUNCTIONNUMBER
  2. BASEFUNCTIONNUMBER EQU 00H
  3. #ENDIF
  4. BEL EQU 07H
  5. BS EQU 08H
  6. TAB EQU 09H
  7. LF EQU 0AH
  8. CR EQU 0DH
  9. BACKTAB EQU 0FH
  10. ESC EQU 1BH
  11. BLANK EQU 20H
  12. __CTRL_A EQU 01H
  13. __CTRL_B EQU 02H
  14. __CTRL_C EQU 03H
  15. __CTRL_D EQU 04H
  16. __CTRL_E EQU 05H
  17. __CTRL_F EQU 06H
  18. __CTRL_G EQU 07H
  19. __CTRL_H EQU 08H
  20. __CTRL_I EQU 09H
  21. __CTRL_J EQU 0AH
  22. __CTRL_K EQU 0BH
  23. __CTRL_L EQU 0CH
  24. __CTRL_M EQU 0DH
  25. __CTRL_N EQU 0EH
  26. __CTRL_O EQU 0FH
  27. __CTRL_P EQU 10H
  28. __CTRL_Q EQU 11H
  29. __CTRL_R EQU 12H
  30. __CTRL_S EQU 13H
  31. __CTRL_T EQU 14H
  32. __CTRL_U EQU 15H
  33. __CTRL_V EQU 16H
  34. __CTRL_W EQU 17H
  35. __CTRL_X EQU 18H
  36. __CTRL_Y EQU 19H
  37. __CTRL_Z EQU 1AH
  38. __ALT_ESC EQU 001H
  39. __BACK_TAB EQU 0F0H
  40. __ALT_Q EQU 010H
  41. __ALT_W EQU 011H
  42. __ALT_E EQU 012H
  43. __ALT_R EQU 013H
  44. __ALT_T EQU 014H
  45. __ALT_Z EQU 015H
  46. __ALT_U EQU 016H
  47. __ALT_I EQU 017H
  48. __ALT_O EQU 018H
  49. __ALT_P EQU 019H
  50. __ALT_UE EQU 01AH
  51. __ALT_PLUS EQU 01BH
  52. __ALT_CR EQU 01CH
  53. __ALT_A EQU 01EH
  54. __ALT_S EQU 01FH
  55. __ALT_D EQU 020H
  56. __ALT_F EQU 021H
  57. __ALT_G EQU 022H
  58. __ALT_H EQU 023H
  59. __ALT_J EQU 024H
  60. __ALT_K EQU 025H
  61. __ALT_L EQU 026H
  62. __ALT_OE EQU 027H
  63. __ALT_AE EQU 028H
  64. __ALT_Y EQU 02CH
  65. __ALT_X EQU 02DH
  66. __ALT_C EQU 02EH
  67. __ALT_V EQU 02FH
  68. __ALT_B EQU 030H
  69. __ALT_N EQU 031H
  70. __ALT_M EQU 032H
  71. __ALT_KOMMA EQU 033H
  72. __ALT_PUNKT EQU 034H
  73. __ALT_BINDESTRICH EQU 035H
  74. __ALT_GPLUS EQU 037H
  75. __F1 EQU 03BH
  76. __F2 EQU 03CH
  77. __F3 EQU 03DH
  78. __F4 EQU 03EH
  79. __F5 EQU 03FH
  80. __F6 EQU 040H
  81. __F7 EQU 041H
  82. __F8 EQU 042H
  83. __F9 EQU 043H
  84. __F10 EQU 044H
  85. __HOME EQU 047H
  86. __CURSORUP EQU 048H
  87. __PAGEUP EQU 049H
  88. __ALT_GMINUS EQU 04AH
  89. __CURSORLEFT EQU 04BH
  90. __CENTER_CURSOR EQU 04CH
  91. __CURSORRIGHT EQU 04DH
  92. __END EQU 04FH
  93. __CURSORDOWN EQU 050H
  94. __PAGEDOWN EQU 051H
  95. __INSERT EQU 052H
  96. __DELETE EQU 053H
  97. __SHIFT_F1 EQU 054H
  98. __SHIFT_F2 EQU 055H
  99. __SHIFT_F3 EQU 056H
  100. __SHIFT_F4 EQU 057H
  101. __SHIFT_F5 EQU 058H
  102. __SHIFT_F6 EQU 059H
  103. __SHIFT_F7 EQU 05AH
  104. __SHIFT_F8 EQU 05BH
  105. __SHIFT_F9 EQU 05CH
  106. __SHIFT_F10 EQU 05DH
  107. __CTRL_F1 EQU 05EH
  108. __CTRL_F2 EQU 05FH
  109. __CTRL_F3 EQU 060H
  110. __CTRL_F4 EQU 061H
  111. __CTRL_F5 EQU 062H
  112. __CTRL_F6 EQU 063H
  113. __CTRL_F7 EQU 064H
  114. __CTRL_F8 EQU 065H
  115. __CTRL_F9 EQU 066H
  116. __CTRL_F10 EQU 067H
  117. __ALT_F1 EQU 068H
  118. __ALT_F2 EQU 069H
  119. __ALT_F3 EQU 06AH
  120. __ALT_F4 EQU 06BH
  121. __ALT_F5 EQU 06CH
  122. __ALT_F6 EQU 06DH
  123. __ALT_F7 EQU 06EH
  124. __ALT_F8 EQU 06FH
  125. __ALT_F9 EQU 070H
  126. __ALT_F10 EQU 071H
  127. __CTRL_PRTSCR EQU 072H
  128. __CTRL_CURL EQU 073H
  129. __CTRL_CURR EQU 074H
  130. __CTRL_END EQU 075H
  131. __CTRL_PGDN EQU 076H
  132. __CTRL_HOME EQU 077H
  133. __ALT_1 EQU 078H
  134. __ALT_2 EQU 079H
  135. __ALT_3 EQU 07AH
  136. __ALT_4 EQU 07BH
  137. __ALT_5 EQU 07CH
  138. __ALT_6 EQU 07DH
  139. __ALT_7 EQU 07EH
  140. __ALT_8 EQU 07FH
  141. __ALT_9 EQU 080H
  142. __ALT_0 EQU 081H
  143. __ALT_SZ EQU 082H
  144. __ALT_HKOMMA EQU 083H
  145. __CTRL_PGUP EQU 084H
  146. __F11 EQU 085H
  147. __F12 EQU 086H
  148. __SHIFT_F11 EQU 087H
  149. __SHIFT_F12 EQU 088H
  150. __CTRL_F11 EQU 089H
  151. __CTRL_F12 EQU 08AH
  152. __ALT_F11 EQU 08BH
  153. __ALT_F12 EQU 08CH
  154. __CTRL_NPUP EQU 08DH
  155. __CTRL_NPMINUS EQU 08EH
  156. __CTRL_NPFUENF EQU 08FH
  157. __CTRL_NPPLUS EQU 090H
  158. __CTRL_NPDOWN EQU 091H
  159. __CTRL_NPINS EQU 092H
  160. __CTRL_NPDEL EQU 093H
  161. __CTRL_TAB EQU 094H
  162. __CTRL_NPSLASH EQU 095H
  163. __CTRL_NPSTERN EQU 096H
  164. __ALT_HOME EQU 097H
  165. __ALT_UP EQU 098H
  166. __ALT_PAGEUP EQU 099H
  167. __ALT_LEFT EQU 09BH
  168. __ALT_RIGHT EQU 09DH
  169. __ALT_END EQU 09FH
  170. __ALT_DOWN EQU 0A0H
  171. __ALT_PAGEDOWN EQU 0A1H
  172. __ALT_INSERT EQU 0A2H
  173. __ALT_DELETE EQU 0A3H
  174. __ALT_NP_SCHRAEGSTRICH EQU 0A4H
  175. __ALT_TAB EQU 0A5H
  176. __ALT_ENTER EQU 0A6H
  177. FUNCTIONKEY? MACRO
  178. OR AL,AL
  179. JZ >M1
  180. CMP AL,0E0H
  181. JZ >M2
  182. CMP AL,0F0H
  183. JNZ >M1
  184. M2:
  185. OR AH,AH
  186. JZ >M20
  187. TEST AL,0
  188. JMP >M1
  189. M20:
  190. OR AL,AL
  191. M1:
  192. #EM
  193. KEYPRESSED MACRO
  194. MOV AH,(BASEFUNCTIONNUMBER + 1)
  195. INT 016H
  196. #EM
  197. READKEY MACRO
  198. MOV AH, BASEFUNCTIONNUMBER
  199. INT 16H
  200. #EM
  201. INKEY MACRO
  202. KEYPRESSED
  203. JZ >M1
  204. READKEY
  205. OR AX,AX
  206. M1:
  207. #EM
  208. GETKBDSTATUS MACRO
  209. MOV AH,(BASEFUNCTIONNUMBER + 2)
  210. INT 016H
  211. #EM
  212. CTRLPRESSED? MACRO
  213. GETKBDSTATUS
  214. TEST AL,04H
  215. #EM
  216. ALTPRESSED? MACRO
  217. GETKBDSTATUS
  218. TEST AL,08H
  219. #EM
  220. RIGHTSHIFTPRESSED? MACRO
  221. GETKBDSTATUS
  222. TEST AL,01H
  223. #EM
  224. LEFTSHIFTPRESSED? MACRO
  225. GETKBDSTATUS
  226. TEST AL,02H
  227. #EM
  228. SHIFTPRESSED? MACRO
  229. GETKBDSTATUS
  230. TEST AL,03H
  231. #EM
  232. SCROLLLOCKAKTIV? MACRO
  233. GETKBDSTATUS
  234. TEST AL,10H
  235. #EM
  236. NUMLOCKAKTIV? MACRO
  237. GETKBDSTATUS
  238. TEST AL,20H
  239. #EM
  240. INSERTAKTIV? MACRO
  241. GETKBDSTATUS
  242. TEST AL,80H
  243. #EM
  244. CAPSLOCKAKTIV? MACRO
  245. GETKBDSTATUS
  246. TEST AL,40H
  247. #EM
  248.